From 4aaa92813e432775a5c2f042202fcc9db12bd87b Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Tue, 9 Jul 2002 06:00:05 +0000 Subject: [PATCH] (hexl-find-file): Bind `completion-ignored-extensions' to nil when prompting for a filename. --- lisp/hexl.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/hexl.el b/lisp/hexl.el index 176def81026..7c4a1610b9e 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el @@ -1,6 +1,6 @@ ;;; hexl.el --- edit a file in a hex dump format using the hexl filter -;; Copyright (C) 1989, 1994, 1998, 2001 Free Software Foundation, Inc. +;; Copyright (C) 1989, 1994, 1998, 2001, 2002 Free Software Foundation, Inc. ;; Author: Keith Gabryelski ;; Maintainer: FSF @@ -277,7 +277,10 @@ You can use \\[hexl-find-file] to visit a file in Hexl mode. (defun hexl-find-file (filename) "Edit file FILENAME in hexl-mode. Switch to a buffer visiting file FILENAME, creating one in none exists." - (interactive "fFilename: ") + (interactive + (list + (let ((completion-ignored-extensions nil)) + (read-file-name "Filename: " nil nil 'ret-must-match)))) (find-file-literally filename) (if (not (eq major-mode 'hexl-mode)) (hexl-mode))) -- 2.30.2